IF exists(SELECT * FROM dbo.sysobjects WHERE name='WEB_afwezigheden' AND xtype='P') 
BEGIN
	DROP PROCEDURE WEB_afwezigheden
END
GO

CREATE   procedure WEB_afwezigheden (@iNr char(9))
as
begin
set nocount on

create table #hulptabel(tekst varchar(8000))

--De hoofding
insert into #hulptabel(tekst)
values('<?xml version="1.0"  encoding="ISO-8859-1" ?>')

insert into #hulptabel(tekst)
select '<leerling iNr="' + @iNr + '">' + 
	'<naam>' +  dbo.WEB_XML(isnull(l.voornaam,'')) + ' '  
	+  dbo.WEB_XML(isnull(l.achternaam,'')) + '</naam>'
from leerlingen as l
where inschrijvingsNr = @iNr

insert into #hulptabel(tekst)
select '<afw><datum>' +  convert(varchar(50),datum,103) + '</datum>'
	+ '<dagdeel>' + case when dagdeel = 'v' then 'Voormiddag'
			when dagdeel = 'n' then 'Namiddag'
			when dagdeel = 'g' then 'Ganse dag'
			else '(voorlopig) Onbekend'
			end + '</dagdeel>' +
	+ '<dagnaam>' + diverse.dbo.dagAfkorting(datum) + '</dagnaam>' 
	+ '<reden>' + case when reden = 'z' then 'Ziek (briefje ouders)'
			when reden = 'd' then 'Ziek (briefje dokter)'
			when reden = 'b' then 'Problematische afwezigheid'
			when reden = 'p' then 'Persoonlijk verlof'
			when reden = 'l' then 'Te laat'
			when reden = 'o' then 'Onwettig aanwezig'
			when reden = 'r' then 'Met reden'
			when reden = 's' then 'Sport en cultuur'
			when reden = 't' then 'Orde en tucht'
			when reden = 'i' then 'Laattijdig'
			when reden = 'g' then 'Onderwijs zieke jongeren'
			else '(voorlopig) Onbekend'
			end + '</reden>' +
	+ '</afw>'
from afwezigheden
where inschrijvingsNr=@iNr
order by datum

insert into #hulptabel(tekst)
select '</leerling>'

select * from #hulptabel
end